home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Programming Languages Suite
/
ProgramD2.iso
/
Borland
/
Borland C++ For TASM
/
USRGUIDE.PAK
/
HEX.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
1996-02-21
|
336b
|
17 lines
{ Turbo Assembler example. Copyright (c) 1993 By Borland International, Inc. }
{ Use with hex.asm }
program HexTest;
var
num : Word;
function HexStr (var num; byteCount : Byte) : string; far; external;
{$L HEX.OBJ}
begin
num := $face;
Writeln('The Converted Hex String is"',HexStr(num,sizeof(num)),'"');
end.